home *** CD-ROM | disk | FTP | other *** search
- i = 1;
- while(numCells >= i)
- {
- set("cell" + i,i);
- i++;
- }
- i = 1;
- while(numCells >= i)
- {
- set("random" + i,random(1000));
- i++;
- }
- lo = 1;
- up = numcells;
- while(lo < up)
- {
- i = lo;
- j = lo;
- while(i < up)
- {
- if(eval("random" + (i + 1)) < eval("random" + i))
- {
- temp = eval("random" + i);
- set("random" + i,eval("random" + (i + 1)));
- set("random" + (i + 1),temp);
- temp = eval("cell" + i);
- set("cell" + i,eval("cell" + (i + 1)));
- set("cell" + (i + 1),temp);
- j = i;
- }
- i++;
- }
- up = j;
- i = up;
- while(lo < i)
- {
- if(eval("random" + i) < eval("random" + (i - 1)))
- {
- temp = eval("random" + i);
- set("random" + i,eval("random" + (i - 1)));
- set("random" + (i - 1),temp);
- temp = eval("cell" + i);
- set("cell" + i,eval("cell" + (i - 1)));
- set("cell" + (i - 1),temp);
- j = i;
- }
- i--;
- }
- lo = j;
- }
- i = 1;
- r = 1;
- c = 1;
- while(numCells >= i)
- {
- piece = eval("cell" + i);
- if(piece == numcells)
- {
- empty = i;
- }
- else
- {
- set("pos" + piece,i);
- setProperty("p" + piece, _X, eval("x" + c));
- setProperty("p" + piece, _Y, eval("y" + r));
- }
- c++;
- if(numCols < c)
- {
- c = 1;
- r++;
- }
- i++;
- }
-